home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Turnbull China Bikeride
/
Turnbull China Bikeride - Disc 2.iso
/
STUTTGART
/
COMM
/
TERMINAL
/
ARMBTX
/
!ARMBTX
/
!Run
< prev
next >
Wrap
Text File
|
1996-10-19
|
2KB
|
46 lines
| ARMBTX - Bildschirmtextdecoder
| Startdatei V 1.01
| Erstellt 02.06.1996 Milius
| Geändert 05.10.1996 Milius
| (c) Milius Software Stade/Tilsiterstr. 2/21680 Stade
Set ARMBTX$Dir <Obey$Dir>
RMEnsure Window 0.00 RMLoad System:modules.toolbox.window
RMEnsure Window 1.17 Error Sie benötigen window 1.17 oder höher um !ARMBTX zu betreiben
RMEnsure Menu 0.00 RMLoad System:modules.toolbox.menu
RMEnsure Menu 0.13 Error Sie benötigen menu 0.13 oder höher um !ARMBTX zu betreiben
RMEnsure ProgInfo 0.00 RMLoad System:modules.toolbox.proginfo
RMEnsure Proginfo 0.00 Error Sie benötigen proginfo um !ARMBTX zu betreiben
RMEnsure DrawFile 0.00 RMLoad System:modules.DrawFile
RMEnsure DrawFile 0.00 Error Sie benötigen DrawFile um !ARMBTX zu betreiben
RMEnsure FileInfo 0.00 RMLoad System:modules.toolbox.FileInfo
RMEnsure FileInfo 0.00 Error Sie benötigen FileInfo um !ARMBTX zu betreiben
RMEnsure IconBar 0.00 RMLoad System:modules.toolbox.IconBar
RMEnsure IconBar 0.00 Error Sie benötigen IconBar um !ARMBTX zu betreiben
RMEnsure Scale 0.00 RMLoad System:modules.toolbox.Scale
RMEnsure Scale 0.00 Error Sie benötigen Scale um !ARMBTX zu betreiben
RMEnsure SaveAs 0.00 RMLoad System:modules.toolbox.SaveAs
RMEnsure SaveAs 0.00 Error Sie benötigen SaveAs um !ARMBTX zu betreiben
| Prüfen, ob der Port richtig konfiguriert wurde (z.B. durch !cfgserial)
|If LEN<cfgserial$Dir>=0 Then Error Ihr serieller Port wurde noch nicht konfiguriert
|<cfgserial$Dir>.!Run
| Konfigurationsparameter
| Darstellungsgroesse Fenster in Punkten
Set ARMBTX$FGroesse_x 1280
Set ARMBTX$FGroesse_y 480
| Offset Fensterrand oben (y) und links (x) in Punkten
Set ARMBTX$FRand_x 20
Set ARMBTX$FRand_y 10
| Zeichensätze
Set ARMBTX$ZS_PGS Trinity.Medium
Set ARMBTX$ZS_S1GS BTX.SMS
Set ARMBTX$ZS_S2GS BTX.SGS
Set ARMBTX$ZS_S3GS BTX.TMS
| Zeichensatzgröße in Punkten
Set ARMBTX$ZS_Hoehe 18
Set ARMBTX$ZS_Breite 15
Iconsprites <ARMBTX$Dir>.!Sprites
Run <ARMBTX$Dir>.!RunImage